home *** CD-ROM | disk | FTP | other *** search
/ ROM Magic / ROM Magic.iso / pc / data_07 / part1.dir / 00035.ls < prev    next >
Encoding:
Text File  |  1995-05-11  |  269 b   |  10 lines
  1. on exitFrame
  2.   global pictno, pictname
  3.   set pictname to string(pictno)
  4.   set pictname to the pathName & pictname
  5.   set mypict to fileio(mnew, "read", pictname)
  6.   set the picture of cast "Picture2" to mypict(mreadpict)
  7.   mypict(mdispose)
  8.   set pictno to pictno + 1
  9. end
  10.